home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / lollipop / heading.tex < prev    next >
Text File  |  1993-01-28  |  1KB  |  32 lines
  1. % Heading.tex copyright 1992 Victor Eijkhout
  2. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  3. %%%%%%%%%%%%%% H E A D I N G S %%%%%%%%%%%%
  4. \@GenericConstruct{Heading}
  5.  
  6. \newif\if@headed
  7. \add@generic@default{\add@after@command{\@headedno}}
  8. \add@Heading@default{\add@after@command{\@headedyes}}
  9.  
  10. \add@Heading@default{\def\@afterpenalty{\penalty\@M}
  11.     \default@break@afterno}
  12. \add@Heading@default{\has@marksyes}
  13.  
  14. \def\@DefineHeading{
  15.     \@DefineStopCommand{\relax}
  16.     \csarg\edef{\@name}%
  17.        {\@gen@open % this contains: \let\CSname{\@name Title}\nxp\tmp@title
  18.         \the\@main@options@list
  19.         \@gen@close}
  20.     }
  21.  
  22. \@HeadingOption{TwoLines}{\switch {\if\EqualString{#1}}
  23.     {yes} {\add@after@command{\next@paragraph{\clubpenalty\M@
  24.                 \next@paragraph{\global\clubpenalty\default@clubpenalty}}}}
  25.     {no}  {\add@after@command{\clubpenalty\default@clubpenalty}}
  26.     {default} {\edef\cs@e{\nxp\add@after@command{\nxp\next@paragraph
  27.                 {\clubpenalty\@w@w{#1}\relax\nxp\next@paragraph
  28.                                 {\global\clubpenalty\default@clubpenalty}}}}
  29.             \cs@e}
  30.     \endswitch}
  31.  
  32.